home *** CD-ROM | disk | FTP | other *** search
/ BMUG PD-ROM BV3 / BMUG PD-ROM Version BV3 (CDRM1097900).iso / HyperCard / Education / Weights & Measures / card_3893.txt < prev    next >
Text File  |  1991-10-27  |  12KB  |  527 lines

  1. -- card: 3893 from stack: in
  2. -- bmap block id: 5224
  3. -- flags: 4000
  4. -- background id: 2785
  5. -- name: 
  6. ----- HyperTalk script -----
  7. on calculate
  8.   global x
  9.   set lockscreen to true
  10.   put 0.304799999985*.304799999985 into c
  11.   put x/1000000 into card field 1
  12.   put x into card field 2
  13.   put x*10000 into card field 3
  14.   put x * 1000000 into card field 4
  15.   put (x / c) /(5280^2) into card field 5
  16.   put (x / c) /9 into card field 6
  17.   put (x / c) into card field 7
  18.   put (x/c)* 144 into card field 8
  19.   put x/1000 into card field 9
  20.   put x /4046.856422  into card field 10
  21.   put x/10000 into card field 11
  22.   put x/(c*100) into card field 12
  23.   set lockscreen to false
  24. end calculate
  25.  
  26.  
  27. -- part 1 (button)
  28. -- low flags: 00
  29. -- high flags: A002
  30. -- rect: left=8 top=91 right=113 bottom=116
  31. -- title width / last selected line: 0
  32. -- icon id / first selected line: 0 / 0
  33. -- text alignment: 1
  34. -- font id: 0
  35. -- text size: 12
  36. -- style flags: 0
  37. -- line height: 16
  38. -- part name: SQ Kilometer
  39. ----- HyperTalk script -----
  40. on mouseUp
  41.   global x
  42.   ask "Enter Value"
  43.   put it * 1000000 into x
  44.   calculate
  45. end mouseUp
  46.  
  47.  
  48.  
  49. -- part 2 (button)
  50. -- low flags: 00
  51. -- high flags: A002
  52. -- rect: left=8 top=159 right=181 bottom=117
  53. -- title width / last selected line: 0
  54. -- icon id / first selected line: 0 / 0
  55. -- text alignment: 1
  56. -- font id: 0
  57. -- text size: 12
  58. -- style flags: 0
  59. -- line height: 16
  60. -- part name: SQ Meters
  61. ----- HyperTalk script -----
  62. on mouseUp
  63.   global x
  64.   ask "Enter Value"
  65.   put it into x
  66.   calculate
  67. end mouseUp
  68.  
  69.  
  70.  
  71. -- part 3 (field)
  72. -- low flags: 01
  73. -- high flags: 0002
  74. -- rect: left=8 top=112 right=131 bottom=116
  75. -- title width / last selected line: 0
  76. -- icon id / first selected line: 0 / 0
  77. -- text alignment: 1
  78. -- font id: 0
  79. -- text size: 12
  80. -- style flags: 0
  81. -- line height: 16
  82. -- part name: 
  83.  
  84.  
  85. -- part 4 (field)
  86. -- low flags: 01
  87. -- high flags: 0002
  88. -- rect: left=8 top=180 right=199 bottom=117
  89. -- title width / last selected line: 0
  90. -- icon id / first selected line: 0 / 0
  91. -- text alignment: 1
  92. -- font id: 0
  93. -- text size: 12
  94. -- style flags: 0
  95. -- line height: 16
  96. -- part name: 
  97.  
  98.  
  99. -- part 5 (button)
  100. -- low flags: 00
  101. -- high flags: A002
  102. -- rect: left=9 top=224 right=246 bottom=117
  103. -- title width / last selected line: 0
  104. -- icon id / first selected line: 0 / 0
  105. -- text alignment: 1
  106. -- font id: 0
  107. -- text size: 12
  108. -- style flags: 0
  109. -- line height: 16
  110. -- part name: SQ Centimeters
  111. ----- HyperTalk script -----
  112. on mouseUp
  113.   global x
  114.   ask "Enter Value"
  115.   put it/10000 into x
  116.   calculate
  117. end mouseUp
  118.  
  119.  
  120.  
  121. -- part 6 (button)
  122. -- low flags: 00
  123. -- high flags: A002
  124. -- rect: left=10 top=290 right=312 bottom=118
  125. -- title width / last selected line: 0
  126. -- icon id / first selected line: 0 / 0
  127. -- text alignment: 1
  128. -- font id: 0
  129. -- text size: 12
  130. -- style flags: 0
  131. -- line height: 16
  132. -- part name: SQ Millimeters
  133. ----- HyperTalk script -----
  134. on mouseUp
  135.   global x
  136.   ask "Enter Value"
  137.   put it/ 1000000 into x
  138.   calculate
  139. end mouseUp
  140.  
  141.  
  142.  
  143. -- part 7 (field)
  144. -- low flags: 01
  145. -- high flags: 0002
  146. -- rect: left=9 top=245 right=264 bottom=117
  147. -- title width / last selected line: 0
  148. -- icon id / first selected line: 0 / 0
  149. -- text alignment: 1
  150. -- font id: 0
  151. -- text size: 12
  152. -- style flags: 0
  153. -- line height: 16
  154. -- part name: 
  155.  
  156.  
  157. -- part 8 (field)
  158. -- low flags: 01
  159. -- high flags: 0002
  160. -- rect: left=10 top=311 right=331 bottom=118
  161. -- title width / last selected line: 0
  162. -- icon id / first selected line: 0 / 0
  163. -- text alignment: 1
  164. -- font id: 0
  165. -- text size: 12
  166. -- style flags: 0
  167. -- line height: 16
  168. -- part name: 
  169.  
  170.  
  171. -- part 9 (field)
  172. -- low flags: 01
  173. -- high flags: 0002
  174. -- rect: left=188 top=112 right=131 bottom=295
  175. -- title width / last selected line: 0
  176. -- icon id / first selected line: 0 / 0
  177. -- text alignment: 1
  178. -- font id: 0
  179. -- text size: 12
  180. -- style flags: 0
  181. -- line height: 16
  182. -- part name: 
  183.  
  184.  
  185. -- part 10 (field)
  186. -- low flags: 01
  187. -- high flags: 0002
  188. -- rect: left=189 top=159 right=178 bottom=297
  189. -- title width / last selected line: 0
  190. -- icon id / first selected line: 0 / 0
  191. -- text alignment: 1
  192. -- font id: 0
  193. -- text size: 12
  194. -- style flags: 0
  195. -- line height: 16
  196. -- part name: 
  197.  
  198.  
  199. -- part 11 (field)
  200. -- low flags: 01
  201. -- high flags: 0002
  202. -- rect: left=189 top=262 right=280 bottom=297
  203. -- title width / last selected line: 0
  204. -- icon id / first selected line: 0 / 0
  205. -- text alignment: 1
  206. -- font id: 0
  207. -- text size: 12
  208. -- style flags: 0
  209. -- line height: 16
  210. -- part name: 
  211.  
  212.  
  213. -- part 13 (field)
  214. -- low flags: 01
  215. -- high flags: 0002
  216. -- rect: left=190 top=312 right=331 bottom=297
  217. -- title width / last selected line: 0
  218. -- icon id / first selected line: 0 / 0
  219. -- text alignment: 1
  220. -- font id: 0
  221. -- text size: 12
  222. -- style flags: 0
  223. -- line height: 16
  224. -- part name: 
  225.  
  226.  
  227. -- part 15 (button)
  228. -- low flags: 00
  229. -- high flags: A002
  230. -- rect: left=188 top=91 right=113 bottom=295
  231. -- title width / last selected line: 0
  232. -- icon id / first selected line: 0 / 0
  233. -- text alignment: 1
  234. -- font id: 0
  235. -- text size: 12
  236. -- style flags: 0
  237. -- line height: 16
  238. -- part name: SQ Miles
  239. ----- HyperTalk script -----
  240. on mouseUp
  241.   global x
  242.   put .304799999985 into c
  243.   ask "Enter Value"
  244.   put it *(c*5280)^2 into x
  245.   calculate
  246. end mouseUp
  247.  
  248.  
  249.  
  250.  
  251. -- part 16 (button)
  252. -- low flags: 00
  253. -- high flags: A002
  254. -- rect: left=189 top=139 right=160 bottom=297
  255. -- title width / last selected line: 0
  256. -- icon id / first selected line: 0 / 0
  257. -- text alignment: 1
  258. -- font id: 0
  259. -- text size: 12
  260. -- style flags: 0
  261. -- line height: 16
  262. -- part name: SQ Yards
  263. ----- HyperTalk script -----
  264. on mouseUp
  265.   global x
  266.   ask "Enter Value"
  267.   put .304799999985 into c
  268.   put it *(c*3)^2 into x
  269.   calculate
  270. end mouseUp
  271.  
  272.  
  273.  
  274. -- part 17 (button)
  275. -- low flags: 00
  276. -- high flags: A002
  277. -- rect: left=189 top=241 right=263 bottom=297
  278. -- title width / last selected line: 0
  279. -- icon id / first selected line: 0 / 0
  280. -- text alignment: 1
  281. -- font id: 0
  282. -- text size: 12
  283. -- style flags: 0
  284. -- line height: 16
  285. -- part name: SQ Feet
  286. ----- HyperTalk script -----
  287. on mouseUp
  288.   global x
  289.   ask "Enter Value in DECIMAL"
  290.   put .304799999985 into c
  291.   put it *c*c into x
  292.   calculate
  293. end mouseUp
  294.  
  295.  
  296.  
  297. -- part 18 (button)
  298. -- low flags: 00
  299. -- high flags: A002
  300. -- rect: left=190 top=291 right=313 bottom=297
  301. -- title width / last selected line: 0
  302. -- icon id / first selected line: 0 / 0
  303. -- text alignment: 1
  304. -- font id: 0
  305. -- text size: 12
  306. -- style flags: 0
  307. -- line height: 16
  308. -- part name: SQ Inches
  309. ----- HyperTalk script -----
  310. on mouseUp
  311.   global x
  312.   ask "Enter Value in DECIMAL"
  313.   put .304799999985 into c
  314.   put it *(c/12)^2 into x
  315.   calculate
  316.  
  317. end mouseUp
  318.  
  319.  
  320.  
  321. -- part 20 (button)
  322. -- low flags: 00
  323. -- high flags: A002
  324. -- rect: left=348 top=91 right=113 bottom=456
  325. -- title width / last selected line: 0
  326. -- icon id / first selected line: 0 / 0
  327. -- text alignment: 1
  328. -- font id: 0
  329. -- text size: 12
  330. -- style flags: 0
  331. -- line height: 16
  332. -- part name: Donnum
  333. ----- HyperTalk script -----
  334. on mouseUp
  335.   global x
  336.   ask "Enter Value"
  337.   put it * 1000 into x
  338.   calculate
  339. end mouseUp
  340.  
  341.  
  342.  
  343. -- part 21 (button)
  344. -- low flags: 00
  345. -- high flags: A002
  346. -- rect: left=347 top=159 right=181 bottom=455
  347. -- title width / last selected line: 0
  348. -- icon id / first selected line: 0 / 0
  349. -- text alignment: 1
  350. -- font id: 0
  351. -- text size: 12
  352. -- style flags: 0
  353. -- line height: 16
  354. -- part name: Acre
  355. ----- HyperTalk script -----
  356. on mouseUp
  357.   global x
  358.   ask "Enter Value"
  359.   put it *4046.856422 into x
  360.   calculate
  361. end mouseUp
  362.  
  363.  
  364.  
  365. -- part 22 (field)
  366. -- low flags: 01
  367. -- high flags: 0002
  368. -- rect: left=348 top=112 right=131 bottom=456
  369. -- title width / last selected line: 0
  370. -- icon id / first selected line: 0 / 0
  371. -- text alignment: 1
  372. -- font id: 0
  373. -- text size: 12
  374. -- style flags: 0
  375. -- line height: 16
  376. -- part name: 
  377.  
  378.  
  379. -- part 23 (field)
  380. -- low flags: 01
  381. -- high flags: 0002
  382. -- rect: left=347 top=180 right=199 bottom=455
  383. -- title width / last selected line: 0
  384. -- icon id / first selected line: 0 / 0
  385. -- text alignment: 1
  386. -- font id: 0
  387. -- text size: 12
  388. -- style flags: 0
  389. -- line height: 16
  390. -- part name: 
  391.  
  392.  
  393. -- part 24 (field)
  394. -- low flags: 01
  395. -- high flags: 0002
  396. -- rect: left=347 top=247 right=266 bottom=455
  397. -- title width / last selected line: 0
  398. -- icon id / first selected line: 0 / 0
  399. -- text alignment: 1
  400. -- font id: 0
  401. -- text size: 12
  402. -- style flags: 0
  403. -- line height: 16
  404. -- part name: 
  405.  
  406.  
  407. -- part 25 (button)
  408. -- low flags: 00
  409. -- high flags: A002
  410. -- rect: left=347 top=226 right=248 bottom=455
  411. -- title width / last selected line: 0
  412. -- icon id / first selected line: 0 / 0
  413. -- text alignment: 1
  414. -- font id: 0
  415. -- text size: 12
  416. -- style flags: 0
  417. -- line height: 16
  418. -- part name: Hectar
  419. ----- HyperTalk script -----
  420. on mouseUp
  421.   global x
  422.   ask "Enter Value"
  423.   put it * 10000 into x
  424.   calculate
  425. end mouseUp
  426.  
  427.  
  428.  
  429. -- part 26 (button)
  430. -- low flags: 00
  431. -- high flags: A002
  432. -- rect: left=189 top=191 right=213 bottom=297
  433. -- title width / last selected line: 0
  434. -- icon id / first selected line: 0 / 0
  435. -- text alignment: 1
  436. -- font id: 0
  437. -- text size: 12
  438. -- style flags: 0
  439. -- line height: 16
  440. -- part name: Squares
  441. ----- HyperTalk script -----
  442. on mouseUp
  443.   global x
  444.   ask "Enter Value in DECIMAL"
  445.   put .304799999985 into c
  446.   put it*100*c*c into x
  447.   calculate
  448. end mouseUp
  449.  
  450.  
  451.  
  452. -- part 27 (field)
  453. -- low flags: 01
  454. -- high flags: 0002
  455. -- rect: left=189 top=212 right=232 bottom=297
  456. -- title width / last selected line: 0
  457. -- icon id / first selected line: 0 / 0
  458. -- text alignment: 1
  459. -- font id: 0
  460. -- text size: 12
  461. -- style flags: 0
  462. -- line height: 16
  463. -- part name: 
  464.  
  465.  
  466. -- part contents for card part 3
  467. ----- text -----
  468. 0.000001
  469.  
  470. -- part contents for card part 4
  471. ----- text -----
  472. 0.92903
  473.  
  474. -- part contents for card part 7
  475. ----- text -----
  476. 9290.303999
  477.  
  478. -- part contents for card part 8
  479. ----- text -----
  480. 929030.399909
  481.  
  482. -- part contents for card part 9
  483. ----- text -----
  484. 0
  485.  
  486. -- part contents for card part 10
  487. ----- text -----
  488. 1.111111
  489.  
  490. -- part contents for card part 11
  491. ----- text -----
  492. 10
  493.  
  494. -- part contents for card part 13
  495. ----- text -----
  496. 1440
  497.  
  498. -- part contents for card part 22
  499. ----- text -----
  500. 0.000929
  501.  
  502. -- part contents for card part 24
  503. ----- text -----
  504. 0.000093
  505.  
  506. -- part contents for card part 23
  507. ----- text -----
  508. 0.00023
  509.  
  510. -- part contents for card part 27
  511. ----- text -----
  512. 0.1
  513.  
  514. -- part contents for background part 5
  515. ----- text -----
  516. 1 --,square kilometers,kilometers square,square kilometer,kilometer square,sq kilometers,kilometers sq,sq kilometer,kilometer sq,square km,km sqaure,sq km, km sq,k2,km2,klm2,sqaure klm,square klm,
  517. 2 --,square meters,square meter,meters square,meter square,sq meters,meters sq,sq meter,meter sq,ms,m2,meters2,
  518. 3 --,square centimeter,centimeter square,,square centimeters,centimeters square,sq centimeters,centimeters sq,sq centimeter,centimeter sq,sq cms,cms sq,sq cm,cm sq,cm2,cms,scm,
  519. 4 --,square millimeters,millimeters square,square millimeter,millimeter square,sq millimeters,millimeters sq,sq millimeter,millimetr sq,sq mm,mm sq,smm,mm2,mlm 2,
  520. 5 --,square miles,miles square,square mile,mile square,sq miles,miles sq,sq mile,mile sq,mi2,miles2,sq mi,mi sq,
  521. 6 --,square yards,yards square,,square yard,yard square,sq yards,yards sq,,sq yard,yard sq,sq yd,yd sq,y2,yd2,yards2,
  522. 7 --,square feet,square foot,foot square,feet square,square ft,square foot,sq ft,sq feet,ft2,sqf,fsq,f2,ft sq,fs,sf,
  523. 8 --,square inches,inches square,square inche,inche square,sq inches,inches sq,sq inche,inche sq,sq in,in sq,in2,sqi,inche2
  524. 9 --,donnum,donom,dunum,dunom,dunnum,donnom,dunnom,donum,dm,donnums,donoms,dunums,dunoms,dunnums,donnoms,dunnoms,donums,
  525. 10 --acres,acre,
  526. 11 --,hectars,hectar,hc,ht,hr,
  527. 12 --,squares,square,100 square feet,100ft2,100 feet square,100 square foot,hundred square feet,100 foot square,100 feet square,100 square ft,100sq ft,100sq feet,100ft2,100 sqf,100fsq,100f2,100ft sq,100fs,100sf,100 sq ft,100 sq feet,100 sq foot,100sq foot,100 ft2,100sqf,100 f2,100 fs,100 sf,